home *** CD-ROM | disk | FTP | other *** search
/ Basic Instinct 2 Press Kit / Basic Instinct 2 Press Kit.iso / pc / main.dxr / Internal_4_More Code.ls < prev    next >
Encoding:
Text File  |  2006-03-15  |  21.5 KB  |  527 lines

  1. global gMaster, gMasterImagesPath, gMasterDocPath, gNotes, gPath, gFolderName4, gFolderName1, gFolderName2, gFolderName3, gMasterFolder, gMasterNotesPath, gMasterLogosPath, gMasterPosterPath, gTracker
  2.  
  3. on mGatherOtherLargeNames
  4.   repeat with w = 1 to gMaster.pSummaryList.count
  5.     vSmallName = gMaster.pSummaryList[w].pSmallName
  6.     repeat with g = 1 to gMaster.pPosterList.count
  7.       if gMaster.pPosterList[g].pSmallName = vSmallName then
  8.         gMaster.pSummaryList[w].pLargeName = gMaster.pPosterList[g].pLargeName
  9.       end if
  10.     end repeat
  11.   end repeat
  12.   repeat with w = 1 to gMaster.pSummaryList.count
  13.     vSmallName = gMaster.pSummaryList[w].pSmallName
  14.     repeat with g = 1 to gMaster.pLogoList.count
  15.       if gMaster.pLogoList[g].pSmallName = vSmallName then
  16.         gMaster.pSummaryList[w].pLargeName = gMaster.pLogoList[g].pLargeName
  17.       end if
  18.     end repeat
  19.   end repeat
  20.   repeat with w = 1 to gMaster.pSummaryList.count
  21.     if gMaster.pSummaryList[w].pType = "productionNotes" then
  22.       gMaster.pSummaryList[w].pLargeName = gNotes.pProductionFileNamePDFenglish
  23.       exit repeat
  24.     end if
  25.   end repeat
  26.   repeat with w = 1 to gMaster.pSummaryList.count
  27.     if gMaster.pSummaryList[w].pType = "productionCredits" then
  28.       gMaster.pSummaryList[w].pLargeName = gNotes.pCreditsFileNamePDFenglish
  29.       exit repeat
  30.     end if
  31.   end repeat
  32. end
  33.  
  34. on mGatherDownloadInfo
  35.   vTempTotal = 0
  36.   vFileTotal = 0
  37.   repeat with x = 1 to gMaster.pSummaryList.count
  38.     if gMaster.pSummaryList[x].pSelected = "yes" then
  39.       vFileTotal = vFileTotal + 1
  40.       case gMaster.pSummaryList[x].pType of
  41.         "productionNotes", "productionNotesSpanish":
  42.           vFromPath = gMaster.pMasterPath & gMaster.pInternalFolders.notesfolder & gMaster.pPlatformSymbol
  43.           if gMaster.pLanguageMode = "english" then
  44.             vPDF_Name = gMaster.pSummaryList[x].pLargeName
  45.             vCount = offset(".", vPDF_Name)
  46.             vDOC_Name = vPDF_Name.char[1..vCount] & "doc"
  47.             vLargeName1 = vPDF_Name
  48.             vLargeName2 = vDOC_Name
  49.           else
  50.             vLargeName1 = gNotes.pProductionFileNamePDFspanish
  51.             vLargeName2 = gNotes.pProductionFileNameDOCspanish
  52.           end if
  53.         "productionCredits", "productionCreditsSpanish":
  54.           vFromPath = gMaster.pMasterPath & gMaster.pInternalFolders.notesfolder & gMaster.pPlatformSymbol
  55.           if gMaster.pLanguageMode = "english" then
  56.             vPDF_Name = gMaster.pSummaryList[x].pLargeName
  57.             vCount = offset(".", vPDF_Name)
  58.             vDOC_Name = vPDF_Name.char[1..vCount] & "doc"
  59.             vLargeName1 = vPDF_Name
  60.             vLargeName2 = vDOC_Name
  61.           else
  62.             vLargeName1 = gNotes.pCreditsFileNamePDFspanish
  63.             vLargeName2 = gNotes.pCreditsFileNameDOCspanish
  64.           end if
  65.         "poster":
  66.           vFromPath = gMaster.pMasterPath & gMaster.pInternalFolders.posterfolder & gMaster.pPlatformSymbol
  67.           vLargeName1 = gMaster.pSummaryList[x].pLargeName
  68.           vLargeName2 = 0
  69.         "logo":
  70.           vFromPath = gMaster.pMasterPath & gMaster.pInternalFolders.logosfolder & gMaster.pPlatformSymbol
  71.           vLargeName1 = gMaster.pSummaryList[x].pLargeName
  72.           vLargeName2 = 0
  73.         "photo":
  74.           vFromPath = gMaster.pMasterPath & gMaster.pInternalFolders.imagesfolder & gMaster.pPlatformSymbol
  75.           vLargeName1 = gMaster.pSummaryList[x].pLargeName
  76.           vLargeName2 = 0
  77.         otherwise:
  78.           alert("you have a problem Los Angeles")
  79.       end case
  80.       vSize = baFileSize(vFromPath & vLargeName1)
  81.       vTempTotal = vTempTotal + value(vSize)
  82.       if vLargeName2 <> 0 then
  83.         vSize = baFileSize(vFromPath & vLargeName2)
  84.         vTempTotal = vTempTotal + value(vSize)
  85.       end if
  86.     end if
  87.   end repeat
  88.   if vTempTotal = 0 then
  89.     vText = "you haven't selected any files to download"
  90.     vText2 = EMPTY
  91.   else
  92.     vTempTotal2 = vTempTotal / 1024
  93.     vTempTotal3 = vTempTotal / 1024 / 1024
  94.     if vTempTotal3 > 1 then
  95.       vMegs = "megs"
  96.       vText2 = "You will need about " & vTempTotal3 & " " & vMegs & " of hard drive space for this download."
  97.     else
  98.       vMegs = "meg"
  99.       vText2 = "You will need less than one meg of hard drive space for this download."
  100.     end if
  101.     vText = "You have selected " & vFileTotal & " files to download"
  102.   end if
  103.   return vText & RETURN & vText2
  104. end
  105.  
  106. on GatherInfo vMode
  107.   gFolderName1 = gMaster.pGeneralSettings.title
  108.   gFolderName2 = gMaster.pExternalFolders.imagesfolder
  109.   gFolderName3 = gMaster.pExternalFolders.docsfolder
  110.   gFolderName4 = gMaster.pExternalFolders.notesfolder
  111.   gFolderName5 = gMaster.pExternalFolders.logosfolder
  112.   gFolderName6 = gMaster.pExternalFolders.posterfolder
  113.   case vMode of
  114.     "desktop":
  115.       gPath = baSysFolder("desktop")
  116.       gMasterFolder = gPath & gFolderName1 & gMaster.pPlatformSymbol
  117.       gMasterImagesPath = gMasterFolder & gFolderName2 & gMaster.pPlatformSymbol
  118.       gMasterDocPath = gMasterFolder & gFolderName3 & gMaster.pPlatformSymbol
  119.       gMasterNotesPath = gMasterFolder & gFolderName4 & gMaster.pPlatformSymbol
  120.       gMasterLogosPath = gMasterFolder & gFolderName5 & gMaster.pPlatformSymbol
  121.       gMasterPosterPath = gMasterFolder & gFolderName6 & gMaster.pPlatformSymbol
  122.     "harddrive":
  123.       fileObj = xtra("FileXtra4").new()
  124.       gPath = fx_FolderSelectDialog(fileObj, "aaa")
  125.       gMasterFolder = gPath & gFolderName1 & gMaster.pPlatformSymbol
  126.       gMasterImagesPath = gMasterFolder & gFolderName2 & gMaster.pPlatformSymbol
  127.       gMasterDocPath = gMasterFolder & gFolderName3 & gMaster.pPlatformSymbol
  128.       gMasterNotesPath = gMasterFolder & gFolderName4 & gMaster.pPlatformSymbol
  129.       gMasterLogosPath = gMasterFolder & gFolderName5 & gMaster.pPlatformSymbol
  130.       gMasterPosterPath = gMasterFolder & gFolderName6 & gMaster.pPlatformSymbol
  131.   end case
  132. end
  133.  
  134. on MasterSaveShowDialog
  135.   vText = mGatherDownloadInfo()
  136.   sprite(152).member.text = vText
  137.   showFlashDialog()
  138. end
  139.  
  140. on MasterSave vWhichOne, vMode
  141.   case vWhichOne of
  142.     "deskTop":
  143.       GatherInfo("deskTop")
  144.     "harddrive":
  145.       GatherInfo("harddrive")
  146.   end case
  147.   vPoster = 0
  148.   vOK = "no"
  149.   repeat with x = 1 to gMaster.pPhotoList.count
  150.     if gMaster.pPhotoList[x].pSelected = "yes" then
  151.       vOK = "yes"
  152.       exit repeat
  153.     end if
  154.   end repeat
  155.   repeat with x = 1 to gMaster.pPosterList.count
  156.     if gMaster.pPosterList[x].pSelected = "yes" then
  157.       vOK = "yes"
  158.       exit repeat
  159.     end if
  160.   end repeat
  161.   case vOK of
  162.     "no":
  163.       nothing()
  164.     "yes":
  165.       nothing()
  166.     otherwise:
  167.       alert(" you have a problem with vOK")
  168.   end case
  169.   Ok = baCreateFolder(gMasterFolder & gFolderName2 & gMaster.pPlatformSymbol)
  170.   vSkip = "yes"
  171.   repeat with x = 1 to gMaster.pPhotoList.count
  172.     if gMaster.pPhotoList[x].pSelected = "yes" then
  173.       vName = gMaster.pPhotoList[x].pLargeName
  174.       if gMaster.pPhotoList[x].pOKtoDownload = "yes" then
  175.         if baFileExists(gMaster.pMasterPath & gMaster.pInternalFolders.imagesfolder & gMaster.pPlatformSymbol & vName) = 1 then
  176.           mGatherDownloadInfo(gMaster.pMasterPath & gMaster.pInternalFolders.imagesfolder & gMaster.pPlatformSymbol & vName)
  177.           vFromPath = gMaster.pMasterPath & gMaster.pInternalFolders.imagesfolder & gMaster.pPlatformSymbol
  178.           vTemp = (the environment).productVersion
  179.           if the platform contains "Mac" then
  180.             case vTemp of
  181.               "8.5.1", "8.5":
  182.                 oneFile = new(xtra("progresscopy"), 1, 100, 100)
  183.                 copyFile(oneFile, vFromPath & vName, gMasterImagesPath & vName, 1, 1, 1)
  184.                 gTracker.mAddDownLoad("photo", vName)
  185.                 oneFile = 0
  186.               otherwise:
  187.                 Ok = baCopyFileProgress(vFromPath & vName, gMasterImagesPath & vName, "always", "Downloading files... ", "Cancel", 0)
  188.                 gTracker.mAddDownLoad("photo", vName)
  189.             end case
  190.           else
  191.             Ok = baCopyFileProgress(vFromPath & vName, gMasterImagesPath & vName, "always", "Downloading files... ", "Cancel", 0)
  192.             gTracker.mAddDownLoad("photo", vName)
  193.           end if
  194.           vSkip = "no"
  195.         end if
  196.       end if
  197.     end if
  198.   end repeat
  199.   if vSkip = "no" then
  200.     CaptionCode(gPath)
  201.   end if
  202.   SavePoster()
  203.   SaveLogos()
  204.   if vMode = "with" then
  205.     SaveNotes()
  206.   end if
  207. end
  208.  
  209. on SavePoster
  210.   vSkip = "yes"
  211.   repeat with x = 1 to gMaster.pPosterList.count
  212.     if gMaster.pPosterList[x].pSelected = "yes" then
  213.       vSkip = "no"
  214.       exit repeat
  215.     end if
  216.   end repeat
  217.   if vSkip = "yes" then
  218.     exit
  219.   else
  220.     vFromPath = gMaster.pMasterPath & gMaster.pInternalFolders.posterfolder & gMaster.pPlatformSymbol
  221.     vToPath = gMasterPosterPath
  222.     Ok = baCreateFolder(gMasterPosterPath)
  223.     repeat with x = 1 to gMaster.pPosterList.count
  224.       if gMaster.pPosterList[x].pSelected = "yes" then
  225.         vlargeName = gMaster.pPosterList[x].pLargeName
  226.         if baFileExists(vFromPath & vlargeName) = 1 then
  227.           vTemp = (the environment).productVersion
  228.           if the platform contains "Mac" then
  229.             case vTemp of
  230.               "8.5.1", "8.5":
  231.                 put "posterfound 8.5.1"
  232.                 oneFile = new(xtra("progresscopy"), 1, 100, 100)
  233.                 copyFile(oneFile, vFromPath & vlargeName, vToPath & vlargeName, 1, 1, 1)
  234.                 gTracker.mAddDownLoad("poster", vlargeName)
  235.                 oneFile = 0
  236.               otherwise:
  237.                 Ok = baCopyFileProgress(vFromPath & vlargeName, vToPath & vlargeName, "always", "Downloading files... ", "Cancel", 0)
  238.                 gTracker.mAddDownLoad("poster", vlargeName)
  239.             end case
  240.             next repeat
  241.           end if
  242.           Ok = baCopyFileProgress(vFromPath & vlargeName, vToPath & vlargeName, "always", "Downloading files... ", "Cancel", 0)
  243.           gTracker.mAddDownLoad("poster", vlargeName)
  244.         end if
  245.       end if
  246.     end repeat
  247.   end if
  248. end
  249.  
  250. on SaveLogos
  251.   vSkip = "yes"
  252.   repeat with x = 1 to gMaster.pLogoList.count
  253.     if gMaster.pLogoList[x].pSelected = "yes" then
  254.       vSkip = "no"
  255.       exit repeat
  256.     end if
  257.   end repeat
  258.   if vSkip = "yes" then
  259.     exit
  260.   else
  261.     vFromPath = gMaster.pMasterPath & gMaster.pInternalFolders.logosfolder & gMaster.pPlatformSymbol
  262.     vToPath = gMasterLogosPath
  263.     Ok = baCreateFolder(vToPath)
  264.     repeat with x = 1 to gMaster.pLogoList.count
  265.       if gMaster.pLogoList[x].pSelected = "yes" then
  266.         vlargeName = gMaster.pLogoList[x].pLargeName
  267.         if baFileExists(vFromPath & vlargeName) = 1 then
  268.           vTemp = (the environment).productVersion
  269.           if the platform contains "Mac" then
  270.             case vTemp of
  271.               "8.5.1", "8.5":
  272.                 put "logofound 8.5.1"
  273.                 oneFile = new(xtra("progresscopy"), 1, 100, 100)
  274.                 copyFile(oneFile, vFromPath & vlargeName, vToPath & vlargeName, 1, 1, 1)
  275.                 gTracker.mAddDownLoad("logo", vlargeName)
  276.                 oneFile = 0
  277.               otherwise:
  278.                 Ok = baCopyFileProgress(vFromPath & vlargeName, vToPath & vlargeName, "always", "Downloading files... ", "Cancel", 0)
  279.                 gTracker.mAddDownLoad("logo", vlargeName)
  280.             end case
  281.             next repeat
  282.           end if
  283.           Ok = baCopyFileProgress(vFromPath & vlargeName, vToPath & vlargeName, "always", "Downloading files... ", "Cancel", 0)
  284.           gTracker.mAddDownLoad("logo", vlargeName)
  285.         end if
  286.       end if
  287.     end repeat
  288.   end if
  289. end
  290.  
  291. on SaveNotesOnly
  292.   if (gMasterImagesPath = EMPTY) or (gMasterDocPath = EMPTY) then
  293.     GatherInfo("deskTop")
  294.     Ok = baCreateFolder(gMasterFolder & gFolderName2 & gMaster.pPlatformSymbol)
  295.     SaveNotes()
  296.   else
  297.     SaveNotes()
  298.   end if
  299. end
  300.  
  301. on SaveNotes
  302.   vSkip = "yes"
  303.   repeat with x = 1 to 4
  304.     if gMaster.pSummaryList[x].pSelected = "yes" then
  305.       vSkip = "no"
  306.       exit repeat
  307.     end if
  308.   end repeat
  309.   if vSkip = "yes" then
  310.     exit
  311.   else
  312.     vFromPath = gMaster.pMasterPath & gMaster.pInternalFolders.notesfolder & gMaster.pPlatformSymbol
  313.     vToPath = gMasterNotesPath
  314.     Ok = baCreateFolder(gMasterNotesPath)
  315.     repeat with x = 1 to 4
  316.       if gMaster.pSummaryList[x].pSelected = "yes" then
  317.         vPDF_Name = gMaster.pSummaryList[x].pLargeName
  318.         vCount = offset(".", vPDF_Name)
  319.         vDOC_Name = vPDF_Name.char[1..vCount] & "doc"
  320.         vNotesPDF = vPDF_Name
  321.         vNotesDOC = vDOC_Name
  322.         if (baFileExists(vFromPath & vNotesPDF) = 1) and (baFileExists(vFromPath & vNotesDOC) = 1) then
  323.           vTemp = (the environment).productVersion
  324.           if the platform contains "Mac" then
  325.             case vTemp of
  326.               "8.5.1", "8.5":
  327.                 oneFile = new(xtra("progresscopy"), 1, 100, 100)
  328.                 copyFile(oneFile, vFromPath & vNotesPDF, vToPath & vNotesPDF, 1, 1, 1)
  329.                 copyFile(oneFile, vFromPath & vNotesDOC, vToPath & vNotesDOC, 1, 1, 1)
  330.                 gTracker.mAddDownLoad("PDF", vNotesPDF)
  331.                 gTracker.mAddDownLoad("DOC", vNotesDOC)
  332.                 oneFile = 0
  333.               otherwise:
  334.                 OK2 = baCopyFileProgress(vFromPath & vNotesPDF, vToPath & vNotesPDF, "always", "Downloading files... ", "Cancel", 0)
  335.                 OK3 = baCopyFileProgress(vFromPath & vNotesDOC, vToPath & vNotesDOC, "always", "Downloading files... ", "Cancel", 0)
  336.                 gTracker.mAddDownLoad("PDF", vNotesPDF)
  337.                 gTracker.mAddDownLoad("DOC", vNotesDOC)
  338.             end case
  339.             next repeat
  340.           end if
  341.           OK2 = baCopyFileProgress(vFromPath & vNotesPDF, vToPath & vNotesPDF, "always", "Downloading files... ", "Cancel", 0)
  342.           OK3 = baCopyFileProgress(vFromPath & vNotesDOC, vToPath & vNotesDOC, "always", "Downloading files... ", "Cancel", 0)
  343.           gTracker.mAddDownLoad("PDF", vNotesPDF)
  344.           gTracker.mAddDownLoad("DOC", vNotesDOC)
  345.         end if
  346.       end if
  347.     end repeat
  348.   end if
  349. end
  350.  
  351. on SaveNotesOrginal
  352.   vSkip = "yes"
  353.   vP = gNotes.pProductionSelected
  354.   vC1 = gNotes.pCastSelected
  355.   vC2 = gNotes.pCreditsSelected
  356.   vF = gNotes.pFilmmakerSelected
  357.   if (vP = "yes") or (vC1 = "yes") or (vC2 = "yes") or (vF = "yes") then
  358.     vSkip = "no"
  359.   end if
  360.   if vSkip = "yes" then
  361.     exit
  362.   else
  363.     vFromPath = gMaster.pMasterPath & gMaster.pInternalFolders.notesfolder & gMaster.pPlatformSymbol
  364.     vToPath = gMasterNotesPath
  365.     Ok = baCreateFolder(gMasterNotesPath)
  366.     if vP = "yes" then
  367.       if gMaster.pLanguageMode = "english" then
  368.         vNotesPDF = gNotes.pProductionFileNamePDFenglish
  369.         vNotesDOC = gNotes.pProductionFileNameDOCenglish
  370.       else
  371.         vNotesPDF = gNotes.pProductionFileNamePDFspanish
  372.         vNotesDOC = gNotes.pProductionFileNameDOCspanish
  373.       end if
  374.       if (baFileExists(vFromPath & vNotesPDF) = 1) and (baFileExists(vFromPath & vNotesDOC) = 1) then
  375.         vTemp = (the environment).productVersion
  376.         if the platform contains "Mac" then
  377.           case vTemp of
  378.             "8.5.1", "8.5":
  379.               oneFile = new(xtra("progresscopy"), 1, 100, 100)
  380.               copyFile(oneFile, vFromPath & vNotesPDF, vToPath & vNotesPDF, 1, 1, 1)
  381.               copyFile(oneFile, vFromPath & vNotesDOC, vToPath & vNotesDOC, 1, 1, 1)
  382.               gTracker.mAddDownLoad("PDF", vNotesPDF)
  383.               gTracker.mAddDownLoad("DOC", vNotesDOC)
  384.               oneFile = 0
  385.             otherwise:
  386.               OK2 = baCopyFileProgress(vFromPath & vNotesPDF, vToPath & vNotesPDF, "always", "Downloading files... ", "Cancel", 0)
  387.               OK3 = baCopyFileProgress(vFromPath & vNotesDOC, vToPath & vNotesDOC, "always", "Downloading files... ", "Cancel", 0)
  388.               gTracker.mAddDownLoad("PDF", vNotesPDF)
  389.               gTracker.mAddDownLoad("DOC", vNotesDOC)
  390.           end case
  391.         else
  392.           OK2 = baCopyFileProgress(vFromPath & vNotesPDF, vToPath & vNotesPDF, "always", "Downloading files... ", "Cancel", 0)
  393.           OK3 = baCopyFileProgress(vFromPath & vNotesDOC, vToPath & vNotesDOC, "always", "Downloading files... ", "Cancel", 0)
  394.           gTracker.mAddDownLoad("PDF", vNotesPDF)
  395.           gTracker.mAddDownLoad("DOC", vNotesDOC)
  396.         end if
  397.       end if
  398.     end if
  399.     if vC1 = "yes" then
  400.       vNotesPDF = gNotes.pCastFileNamePDF
  401.       vNotesDOC = gNotes.pCastFileNameDOC
  402.       if (baFileExists(vFromPath & vNotesPDF) = 1) and (baFileExists(vFromPath & vNotesDOC) = 1) then
  403.         vTemp = (the environment).productVersion
  404.         if the platform contains "Mac" then
  405.           case vTemp of
  406.             "8.5.1", "8.5":
  407.               oneFile = new(xtra("progresscopy"), 1, 100, 100)
  408.               copyFile(oneFile, vFromPath & vNotesPDF, vToPath & vNotesPDF, 1, 1, 1)
  409.               copyFile(oneFile, vFromPath & vNotesDOC, vToPath & vNotesDOC, 1, 1, 1)
  410.               gTracker.mAddDownLoad("PDF", vNotesPDF)
  411.               gTracker.mAddDownLoad("DOC", vNotesDOC)
  412.               oneFile = 0
  413.             otherwise:
  414.               OK2 = baCopyFileProgress(vFromPath & vNotesPDF, vToPath & vNotesPDF, "always", "Downloading files... ", "Cancel", 0)
  415.               OK3 = baCopyFileProgress(vFromPath & vNotesDOC, vToPath & vNotesDOC, "always", "Downloading files... ", "Cancel", 0)
  416.               gTracker.mAddDownLoad("PDF", vNotesPDF)
  417.               gTracker.mAddDownLoad("DOC", vNotesDOC)
  418.           end case
  419.         else
  420.           OK2 = baCopyFileProgress(vFromPath & vNotesPDF, vToPath & vNotesPDF, "always", "Downloading files... ", "Cancel", 0)
  421.           OK3 = baCopyFileProgress(vFromPath & vNotesDOC, vToPath & vNotesDOC, "always", "Downloading files... ", "Cancel", 0)
  422.           gTracker.mAddDownLoad("PDF", vNotesPDF)
  423.           gTracker.mAddDownLoad("DOC", vNotesDOC)
  424.         end if
  425.       end if
  426.     end if
  427.     if vC2 = "yes" then
  428.       if gMaster.pLanguageMode = "english" then
  429.         vNotesPDF = gNotes.pCreditsFileNamePDFenglish
  430.         vNotesDOC = gNotes.pCreditsFileNameDOCenglish
  431.       else
  432.         vNotesPDF = gNotes.pCreditsFileNamePDFspanish
  433.         vNotesDOC = gNotes.pCreditsFileNameDOCspanish
  434.       end if
  435.       if (baFileExists(vFromPath & vNotesPDF) = 1) and (baFileExists(vFromPath & vNotesDOC) = 1) then
  436.         vTemp = (the environment).productVersion
  437.         if the platform contains "Mac" then
  438.           case vTemp of
  439.             "8.5.1", "8.5":
  440.               put "creditnotesfound 8.5.1"
  441.               oneFile = new(xtra("progresscopy"), 1, 100, 100)
  442.               copyFile(oneFile, vFromPath & vNotesPDF, vToPath & vNotesPDF, 1, 1, 1)
  443.               copyFile(oneFile, vFromPath & vNotesDOC, vToPath & vNotesDOC, 1, 1, 1)
  444.               gTracker.mAddDownLoad("PDF", vNotesPDF)
  445.               gTracker.mAddDownLoad("DOC", vNotesDOC)
  446.               oneFile = 0
  447.             otherwise:
  448.               OK2 = baCopyFileProgress(vFromPath & vNotesPDF, vToPath & vNotesPDF, "always", "Downloading files... ", "Cancel", 0)
  449.               OK3 = baCopyFileProgress(vFromPath & vNotesDOC, vToPath & vNotesDOC, "always", "Downloading files... ", "Cancel", 0)
  450.               gTracker.mAddDownLoad("PDF", vNotesPDF)
  451.               gTracker.mAddDownLoad("DOC", vNotesDOC)
  452.           end case
  453.         else
  454.           put "creditnotesfound 9.0"
  455.           put "creditnotesfound 9.0 win"
  456.           OK2 = baCopyFileProgress(vFromPath & vNotesPDF, vToPath & vNotesPDF, "always", "Downloading files... ", "Cancel", 0)
  457.           OK3 = baCopyFileProgress(vFromPath & vNotesDOC, vToPath & vNotesDOC, "always", "Downloading files... ", "Cancel", 0)
  458.           gTracker.mAddDownLoad("PDF", vNotesPDF)
  459.           gTracker.mAddDownLoad("DOC", vNotesDOC)
  460.         end if
  461.       end if
  462.     end if
  463.     if vF = "yes" then
  464.       vNotesPDF = gNotes.pFilmmakerFileNamePDF
  465.       vNotesDOC = gNotes.pFilmmakerFileNameDOC
  466.       if (baFileExists(vFromPath & vNotesPDF) = 1) and (baFileExists(vFromPath & vNotesDOC) = 1) then
  467.         vTemp = (the environment).productVersion
  468.         if the platform contains "Mac" then
  469.           case vTemp of
  470.             "8.5.1", "8.5":
  471.               oneFile = new(xtra("progresscopy"), 1, 100, 100)
  472.               copyFile(oneFile, vFromPath & vNotesPDF, vToPath & vNotesPDF, 1, 1, 1)
  473.               copyFile(oneFile, vFromPath & vNotesDOC, vToPath & vNotesDOC, 1, 1, 1)
  474.               gTracker.mAddDownLoad("PDF", vNotesPDF)
  475.               gTracker.mAddDownLoad("DOC", vNotesDOC)
  476.               oneFile = 0
  477.             otherwise:
  478.               OK2 = baCopyFileProgress(vFromPath & vNotesPDF, vToPath & vNotesPDF, "always", "Downloading files... ", "Cancel", 0)
  479.               OK3 = baCopyFileProgress(vFromPath & vNotesDOC, vToPath & vNotesDOC, "always", "Downloading files... ", "Cancel", 0)
  480.               gTracker.mAddDownLoad("PDF", vNotesPDF)
  481.               gTracker.mAddDownLoad("DOC", vNotesDOC)
  482.           end case
  483.         else
  484.           OK2 = baCopyFileProgress(vFromPath & vNotesPDF, vToPath & vNotesPDF, "always", "Downloading files... ", "Cancel", 0)
  485.           OK3 = baCopyFileProgress(vFromPath & vNotesDOC, vToPath & vNotesDOC, "always", "Downloading files... ", "Cancel", 0)
  486.           gTracker.mAddDownLoad("PDF", vNotesPDF)
  487.           gTracker.mAddDownLoad("DOC", vNotesDOC)
  488.         end if
  489.       end if
  490.     end if
  491.   end if
  492. end
  493.  
  494. on getDestFromUser vFolder
  495.   fileObj = xtra("FileXtra4").new()
  496.   if the platform contains "Mac" then
  497.     thePath = fileObj.fx_FileSaveAsDialog("Macintosh HD:", vFolder, "Save")
  498.   else
  499.     thePath = fileObj.fx_FileSaveAsDialog(the moviePath, vFolder, "Save", 1)
  500.   end if
  501.   fileObj = 0
  502. end
  503.  
  504. on testNotes
  505.   if baFileExists(the moviePath & "notes:note1.rtf") = 1 then
  506.     put "yes it can find the file"
  507.   end if
  508. end
  509.  
  510. on testNotes2
  511.   global fileObj, gOrginalNotesPath
  512.   if the platform contains "Mac" then
  513.     gOrginalNotesPath = the moviePath & "notes:"
  514.   else
  515.     gOrginalNotesPath = the moviePath & "notes\"
  516.   end if
  517.   fileObj = xtra("FileXtra4").new()
  518.   if fx_FileExists(fileObj, gOrginalNotesPath & "jerryfix.dir") = 1 then
  519.     x = gOrginalNotesPath & "jerryfix.dir"
  520.     y = the moviePath & "Antwone Fisher:docs:jerryfix2.dir"
  521.     fx_FileCopy(fileObj, x, y)
  522.     vError = fileObj.fx_ErrorString()
  523.     fileObj = 0
  524.   end if
  525.   put vError
  526. end
  527.